Top 10k strings from Supremacy (1991)(Dominic Morris).tap in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Games / [TAP] /
Back to the directory listing
7 a$(pl,o3)= 6 p(n,o1)+o2,p(n,o2); 6 ;"Supremacy By D Morris" 5 p(n,o4)=pl+o5 5 p(n,o4)=pl 4 o1;"Hit Enter": 4 a$(pl,n+o3)= 4 a$(pl,n+o3): 4 +p(n,o3)): 4 "21",o3;"HIT 3 o1;"Hit Enter to Continue": 3 i$="Native": 3 f(pl,o1,o4) 3 f(pl,o1,o1) 3 +(y*o3),o3+s(y);" 3 Supremacy 2 r(uppla,o5)=o1 2 r(plan,n)=r(plan,n)+(d(o1,n)-d(o3,n)): 2 p(uppla,o4)=pl 2 p(uppla,o4)= 2 p(uppla,o1)+o2,p(uppla,o2); 2 p(plan,o4)=o5: 2 p(pla,o4)=o5: 2 p(pla,o4)=o1 2 p(n,o4)=pl+ 2 p(n,o4)=o5 2 o1;p$(f(pl,n,o1)); 2 mon=mon+c(y): 2 f(pl,n,o1) 2 d(o3,o4)=d(o1,o4): 2 d(o3,o3)=d(o1,o3): 2 d(o3,o2)=d(o1,o2): 2 d(o3,o1)=d(o1,o1): 2 d(o1,o5)=o0 2 a$(pl,o3): 2 _G";a$(pl,o3); 2 CONTINUE": 2 ;s(n);" ": 2 ;s$(f(pl,n,o2)); 2 ;f(pl,n,o3); 2 +(n*o3),15 2 "SUPREM.DAT" 2 "7";a$(pl,o3): 2 "7";"Lord"; 2 "25";a$(n,o1); 1 x8x8x8xx8x8((x( 1 x8x8x8xx8x 1 x8x8x8x8x8x8x8x8xx8x8x8x 1 x8x008x80808x8x 1 typ=f(pl,o1,o2): 1 s(y)=s(y)-o1: 1 s(y)=s(y)-o1 1 s(y)=s(y)-1 1 s(y)=s(y)+o1: 1 s(y)=s(y)+o1 1 s(y) < r(pla1,y) 1 s$(o4,o2): 1 s$(n),c(n): 1 reb=(p(n,o4)^o2)/o2: 1 r(uppla,o5)=o1: 1 r(pla1,o5)=o1 1 r(pla1,n)=r(pla1,n)-s(n): 1 r(pla,typ)=r(pla,typ)+no: 1 r(n,m);" ";: 1 r(d(o1,o5),n)=r(d(o1,o5),n)-d(o4,n): 1 plan=d(o1,o5): 1 pla=f(pl,o1,o1) 1 pla1=uppla: 1 p(uppla,o4)=o6 1 p(uppla,o4)=o5 1 p(uppla,o4)=o4: 1 p(uppla,o4)=o4 1 p(uppla,o4)=o3: 1 p(uppla,o4)=o3 1 p(uppla,o4)=o0: 1 p(uppla,o4) 1 p(uppla,o3)=p(uppla,o3)-o1: 1 p(uppla,o3)=p(uppla,o3)+o1: 1 p(uppla,o3)=o1 1 p(uppla,o3)= 1 p(uppla,o3)< 7 1 p(uppla,o3)< 1 p(uppla,o1)+o2,p(uppla,2 1 p(plan,o4)=pl+o2 1 p(plan,o4)=o4 1 p(plan,o4)=o3 1 p(plan,o4)=o2 1 p(plan,o4)=o1 1 p(plan,o4)=7 1 p(plan,o4)=6 1 p(pla,o4)=pl+o5 1 p(pla,o4)=pl 1 p(pla,o4)=o4 1 p(pla,o4)=o3 1 p(pla,o4)=o2 1 p(pla,o4)=7 1 p(pla,o4)=6 1 p(n,o4)=pl+o5) 1 p(n,o4)=p(n,o4)-o4: 1 p(n,o4)=p(n,o4)- 1 p(n,o4)=o4 1 p(n,o4)=o3 1 p(n,o4)=(pl+9 1 p(n,o4)=(pl+7 1 p(d(o1,o5),o4)=pl: 1 o5,o1;p$ ( 1 o5,o1;"To change number of"; 1 o3,o5;" Select Planet ": 1 o3,o3;" Number of turns "; 1 o3 < f(pl,g(pl),o4) 1 o1;"Task Force Destroyed": 1 o1;"System Captured": 1 o1;"Scout"; 1 o1;"Scout Destroyed": 1 o1;"Ruled by "; 1 o1;" Report on "; 1 o1;" Planets ": 1 o1;" Launch " 1 o1;" Income ": 1 o1;" Build 1 o1;" Battle " 1 o1,o0;"You haven't got `G200."; 1 o1,o0;"You haven't got `G1000."; 1 o1,o0;"You don't rule that planet"; 1 o1,o0;"You can't upgrade that planet"; 1 o1,o0;"You can't scrap your home"; 1 o1,o0;"You can't place your home there"; 1 o1,o0;"You can't downgrade your home"; 1 o1,o0;"You can't downgrade that planet"; 1 o1,o0;"That planet is underdeveloped"; 1 o1,o0;"That planet has a Stargate"; 1 o1,o0;"Sorry all flight space is taken"; 1 o1,o0;"Select planet to upgrade"; 1 o1,o0;"Select planet to scrap"; 1 o1,o0;"Select planet to downgrade"; 1 o1,o0;"Select planet for new home"; 1 o1,o0;"Select planet for Stargate"; 1 o1,o0;"Select Source Planet"; 1 o1,o0;"Select Planet for report"; 1 o1,o0;"Select Destination"; 1 o0,o0;"LORD 1 o0,o0;"BAD LUCK"; 1 no=f(pl,o1,o3): 1 n$(plre)-22 1 mon=mon-c(y): 1 mon=mon+25 1 mon=mon+100 1 k=f(pl,i+1 1 k3=f(pl,i+1 1 k2=f(pl,i+1 1 k1=f(pl,i+1 1 j-j0+del): 1 j$="Stargate" 1 j$="No Stargate": 1 inc=inc+p(n,o3)*rn: 1 i$="Lord "+a$(p(uppla,o4),o1): 1 i$="Lord "+a$(o2,o1): 1 i$="Lord "+a$(o1,o1): 1 g(pl)=g(pl)-o1: 1 g(pl)=g(pl)+o1: 1 fo=r(n,o1)+(r(n,o2)*o2)+(r(n,o3)*o3)+(r(n,o4)*o4): 1 f(pl,n-o1,m)=f(pl,n,m): 1 f(pl,n,o4)=u+o1 1 f(pl,g(pl),o4)= u+ 1 f(pl,g(pl),o3)=s(n): 1 f(pl,g(pl),o2)=n: 1 f(pl,g(pl),o1)=pla2: 1 f(pl,g(pl), o4)=u+o3 1 del=(i-i2)*length: 1 d2=p(pla2,o2)-p(pla1,o2): 1 d1=p(pla2,o1)-p(pla1,o1): 1 d(o4,o4)=d(o2,o4): 1 d(o4,o4)=d(o2,o4) 1 d(o4,o4)=d(o1,o4): 1 d(o4,o3)=d(o2,o3): 1 d(o4,o3)=d(o2,o3) 1 d(o4,o3)=d(o1,o3): 1 d(o4,o2)=d(o2,o2): 1 d(o4,o2)=d(o2,o2) 1 d(o4,o2)=d(o1,o2): 1 d(o4,o1)=d(o2,o1): 1 d(o4,o1)=d(o2,o1) 1 d(o4,o1)=d(o1,o1): 1 d(o3,o4)=d(o2,o4): 1 d(o3,o3)=d(o2,o3): 1 d(o3,o2)=d(o2,o2): 1 d(o3,o1)=d(o2,o1): 1 d(o2,o4) > d(o1,o4) 1 d(o2,o3) > d(o1,o3) 1 d(o2,o2) > d(o1,o2) 1 d(o2,o1) > d(o1,o1) 1 d(o2,n)=r(plan,n): 1 d(o1,typ)=d(o1,typ)+no: 1 d(o1,o5)=pla: 1 d(o1,o4)=d(o1,o4) 1 d(o1,o4) > d(o2,o4) 1 d(o1,o3)=d(o1,o3) 1 d(o1,o3) > d(o2,o3) 1 d(o1,o2)=d(o1,o2) 1 d(o1,o2) > d(o2,o2) 1 d(o1,o1)=d(o1,o1) 1 d(o1,o1) > d(o2,o1) 1 che=che-r(n,m): 1 che=che-d(o3,n): 1 che=che-d(o1,n): 1 che=che+s(n): 1 che=che+(d(o2,n)-d(o4,n)): 1 ch=p(d(o1,o5),o4): 1 arr=f(pl,o1,o4): 1 a$(pl,o5); 1 a$(pl,o4); 1 a$(pl,o2)= 1 a$(pl,o2),n)=r( 1 a$(pl,o2),n)+s(n) 1 a$(pl,o2));" (Empire)"; 1 a$(pl,o2))''"YOUR 1 a$(pl,o2)) 1 a$(pl,n+o3)="0" 1 a$(pl,n+o3)< 1 a$(pl,m+o3)= 1 a$(pl,m+o3): 1 a$(o2,n)="0": 1 a$(o1,n)="0": 1 a$(n,o2),o)=o0: 1 a$(n,o2)): 1 a$(n,o1,m)>"a" 1 a$(n,o1,m)= 1 a$(n,o1,m)<"z" 1 a$(n,o1,m): 1 a$(n,o1)=j$: 1 a$(che,n+o3)= 1 a$(che,n+o3)-d(o2,n): 1 ZWindowX 1.2 by Paul Dias, Feb 91. For 'Your Sinclair' magazine. 1 You have at your disposal 4 different types of ships. 1 You control one Solar System in the Galaxy, your race is capableof spaceflight. Using skill and your Galactic Pounds you must take over all 26 Solar Systems of your galaxy. But beware, yoursis not the only space going race in the galaxy. 1 X8x8x8x8x8x8x8x8x88x8x8(8 1 X8x8x8x88x8x((8( 1 Version 2.2 12/10/91 1 To select a menu use the keys '1' to '5' and the appropriate menu will 'pop' up. To control the bar use 'q' and 'a' and Enterto select. If you do not want any of the options on a menu press any key apart from 'q','a' and Enter. 1 Then you will be asked to specify the number of turns over whichyou want the game to take place. It can be in multiples of 10 from 50 to 10000. 1 Then a map will appear with the positions of the planets on. After a short delay the details of player 1 will print up on theBLUE window on the right hand side. Make sure player 2 isn't looking and decide on your starting planet. Again do likewise for player 2. 1 The first thing that will happen after the game has loaded will be that a window will appear with: 1 Scout. The scout is the least powerful of the ships that you can buy. It is used for sniffing out other solar systems and sending back information. It costs `G5. 1 SUPREM.INSZ 1 SUPREM.COD 1 SUPREM 1 SHIPS."''"YOUR 1 SHIPS"''a$(pl, 1 SCOUTS"''a$(pl,o5);" 1 Press 'R' for a report on a planet. 1 Press 'I' for a list of ships in flight. 1 Press 'F' for the number of ships in your empire. 1 Press 'E' to end your turn. 1 Please ensure that you have the correct disc in the drive, if you haven't the program will crash back into BASIC. 1 PLANET.P$ 1 PLANET.P 1 On the map some of the planets appear in different colours. 1 OPPONENTSHOME 1 Now type GOTO 170 (even if you can't read what you are typing) and press enter. You should now be able to play again. 1 Note Supremacy is written using WINDOWX by Paul Dias 1 My name is Dominic Morris and I'm playing Billy Bragg to death at the moment! See everyone I know on Saturday night. Personal info: Height:5'9~ Weight:10 stone 4 lb. Blond hair, brown eyes, live in Malvern, England, running out of bytes!!!!! Bye......... 1 Missile Ship. Can be used to help conquer systems, without the help of other types of ships. It costs `G10. 1 If you think that your opponent is near you can change the position of your home planet. You can do this by selected menu '5' pressing enter and then pressing the letter of another planet in your empire. The planet has to be at least level 7 though. 1 If you choose to build or launch a ship you will be presented with a window with 4 bars in it. Use 'o' and 'p' to change the number of ships you want to build or launch, 'q' and 'a' switch between the bars. Press Enter to finish. 1 If you are in 128k mode the screen will be unreadable to make sure you are on the command line press enter. 1 I have included a number of short cuts to several operations. These are listed below. 1 For a start there is your opponent, who controls a race of the equal capabilities to yours. You don't know where his race is, it could be the next planet, or it could be across the galaxy. 1 Dreadnought. The most powerful of the ships at your disposal. If you have enough money you can solely rely on this ship for your empire expanding. It costs `G20. 1 DREADNOUGHTS": 1 Cruiser. The cruiser is slightly more powerful than the scout, and costs `G7. 1 Controlling Supremacy 1 CRUISERS"''a$(pl, 1 Best of luck: Dom 1 Because 10000 turns is a lot to play in one session I have included a saving and loading option. 1 BASE."''"YOUR 1 After selecting some options prompts may be printed in the whitebar where the menu options normally are. Obey these by pressing the appropriate key on the keyboard. 1 ABBOT BUFRE CICE DERH ETHICA FESGAR GANGHI HOLIH INCA JENGHISKAFGHI LAMEF MEIG NOSTRA OCCA PAWT QUARK RATER SERIG TERRIS UNKA VEFDA WWWA XARQ YARK ZELT 1 A RED planet indicates that you used to rule a planet but its people have rebelled. 1 A GREEN planet indicates that you have surveyed the planet and have all the details of it. 1 A BLUE planet indicates that the system is currently in your empire. 1 <<BBBBRRbb<< 1 ;p(uppla,o3): 1 ;p(n,o3);" ";: 1 ;n$(plre,n 1 ;f(pl,n,o4); 1 ;f(pl,n,o4): 1 ;d(o2,m)-d(o4,m): 1 ;d(o1,m)-d(o3,m): 1 ;a$(pl,o2) 1 ;a$(pl,o1); 1 ;"Scouts"; 1 ;"Missile"; 1 ;"Hit Enter": 1 ;"Hit Enter to load Supremacy": 1 ;"Hit Enter to Continue" 1 ;"Dreadnoughts"; 1 ;"Cruisers"; 1 ;" In Flight "; 1 8x8x8x8x8x8 1 8x8x8x8x8h8x8x8x8x8x8x88x8x8x8x8x8x8x8x8x8x8x8x8x8x8x8x! 1 8x8x8x8x0x008x8 1 8x8x8x0008 1 23638-0717": 1 23637+256* 1 0x8x8x8x8x8x8x8x0x008x 1 0x8x808x800x 1 0x x008x8x8 1 08x8x8x8x8x8x8x8x80808 1 08x8x8x8 x 1 0888xx8x8X 1 ,o3;r(uppla,o4); 1 ,o3;r(uppla,o3); 1 ,o3;r(uppla,o2); 1 ,o3;r(uppla,o1); 1 ,o3;"Missile"; 1 ,o3;"Dreadnought": 1 ,o3;"Cruiser"; 1 ,o3;"Craft"; 1 ,o1;p$(d(o1,o5)); 1 ,o1;"Dest Type No Turn": 1 ,o0;p$(n); 1 +n,o1;s$(n); 1 +n,o1;s$(n): 1 +(n*o3),o3+s(n);" 1 ** V2.2 - 12/10/91 ** 1 ** (C) D MORRIS ** 1 ** SUPREMACY ** 1 *(o1+p(n,o3))/(m/o2)): 1 )=f(pl,j,4 1 )=f(pl,j,3 1 )=f(pl,j,2 1 )=f(pl,j,1 1 (p(uppla,o4) 1 (d(o1,o1)-d(o3,o1))+((d(o1,o2)-d(o3,o2))*o2)+((d(o1,o3)-d(o3,o3))*o3)+((d(o1,o4)-d(o3,o4))*o4) > (d(o2,o1)-d(o4,o1))+((d(o2,o2)-d(o4,o2))*o2)+((d(o2,o3)-d(o4,o3))*o3)+((d(o2,o4)-d(o4,o4))*o4) 1 (8x 8 8x8x8x8x 1 ((p(n,o4)=pl 1 ((d1*d1)+(d2*d2))): 1 'Pop' up menu 1 by pressing one, select the correct option by using 'q' and 'a'. Saving and loading is done automatically. 1 ''a$(pl,o4);" 1 "SUPREM.COD" 1 "Player 1" written in it. There will also be a cursor. Enter thename of player 1 here, make sure it is no longer than 7 characters. Do likewise for player 2. 1 "PLANET.P$" 1 "PLANET.P" 1 ";a$(pl,o1)'''"THE 1 ";a$(pl,o1)'"HOME 1 "96",o4)=n: 1 "9";"Player ";n: 1 "9";"Hit Enter to Continue": 1 "9",o3;"Nothing to report.": 1 "8";p$(n); 1 "8";"Income"; 1 "8";"Bank"; 1 "8";" Game Map "; 1 "8";" About ": 1 "8",o3;" Rebellion "; 1 "7";''"YOU 1 "7";"Status": 1 "7",o1;"Enter confirms.": 1 "7"''"YOUR 1 "64");" - "; 1 "6";"Scouts"; 1 "6";"Missile"; 1 "6";"Dreadnought"; 1 "6";"Cruiser"; 1 "6";"CONGRATULATIONS!"; 1 "6";" Credits ": 1 "6",o1;"turns use 'q' and 'a'"; 1 "25";"Home";: 1 "25";"Home"; 1 "23642")-( 1 "21",o1;"Hit Enter to Continue": 1 "21",o1;"ASK 1 "19",o3;j$ 1 "17";p(n,o3)*rn: 1 "17",o5;"Hit Enter": 1 "17",o3;"Hit Enter": 1 "17",o1;"Hit Enter to Continue": 1 "16";" Mail ": 1 "150"+p(uppla,o3)) 1 "14";" Read Mail ": 1 "14",o0;"contributions"; 1 "13";a$(pl,o1); 1 "13";a$(o2,o1); 1 "13",o4;"Hit Enter to Continue": 1 "13",o0;"Refusing to pay"; 1 "12",o5;"Hit Enter to Continue": 1 "11",o3;"Hit any Key to Continue": 1 "100",o4): 1 "10";"Hit Enter": 1 "10";" Fleet "; 1 "10",o0;"You have chosen the same planet."; 1 "10",o0;"Rebellion on:"; 1 "10","Dr", 1 to see who gains control. Your opponent 1 they will be able to colonize your home 1 should not see what you are doing, because 1 planet if this happens the game ends. 1 WindowX by Paul Dias 1 Upgrade Planet 1 This program was written by 1 This game enables you to control the Galaxy 1 Send Mail 1 Screen Compress from YS 1 Scrap Planet 1 Save Position 1 Report on Planet 1 Read Mail 1 Quit Supremacy 1 Load Position 1 Launch Ships 1 Last Battle 1 It is a two player game, so you can battle 1 In Flight 1 Fleet Size 1 File Mail Planet Options Game Details 1 Empire Size 1 Downgrade Planet 1 Dominic Morris using: 1 Change Home 1 Build Stargate 1 Build Ships 1 About Supremacy 1 64 column text from +3UG 1